Public Class CSalePrint
    Dim _intCityCD As Integer
    Dim _strDoctorDesc As String
    Dim taxCalc As CtaxCalculation
    Public Property CityCD() As String
        Get
            Return _intCityCD
        End Get
        Set(ByVal value As String)
            _intCityCD = value
        End Set
    End Property
    Public Property DoctorDesc() As String
        Get
            Return _strDoctorDesc
        End Get
        Set(ByVal value As String)
            _strDoctorDesc = value
        End Set
    End Property
    Public Property TaxCalculation() As CtaxCalculation
        Get
            Return taxCalc
        End Get
        Set(ByVal value As CtaxCalculation)
            taxCalc = value
        End Set
    End Property
End Class
